home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Demos / AppMaker 2.0b3 / Demo AppMaker 1.5 / Demo AppMaker™ / Demo AppMaker™.rsrc / TmpC_1005_StatText < prev    next >
Encoding:
Text File  |  1992-04-08  |  365 b   |  20 lines
  1. %case update%
  2.     SetWFont (%itemname%);
  3.     GetWRect (%itemname%, &bounds);
  4.     TextIDBox (%textID%, bounds);
  5. %case itemNr%
  6.     %DefineItem%
  7. %case dialog field%
  8.     %if variable%
  9.         Str255            %fieldname%;
  10.         %haveField%
  11.     %end if%
  12. %case init field%
  13.     %if variable%
  14.         info->%fieldname% [0] = 0;
  15.     %end if%
  16. %case set%
  17.     %if variable%
  18.         SetDText (%itemname%, info->%fieldname%);
  19.     %end if%
  20.